﻿Public Class Cliente : Inherits Personal
    Public Sub New(ByVal nombre As String, ByVal pass As String, ByVal user As String, Optional ByVal id As String = Nothing)
        _FullName = nombre
        _Password = pass
        _Usuario = user
        _ID = id
    End Sub
End Class
